# name : dplyr::count Count observations by group
# key : count.by.group
# key : dplyr.count.by.group
# contributor: Shuguang Sun
# --
group_by(${1:id}) |>
arrange(${2:index}, .by_group = TRUE) |>
dplyr::count(${3:cols}${4:$$(yas-choose-value '("" ", wt = NULL, sort = FALSE"))}, name = ${5:"n"}) |>
ungroup()